function showVideo(filename)
hvfr = vision.VideoFileReader(filename);
hp = vision.VideoPlayer;
while ~isDone(hvfr)
    videoFrame = step(hvfr);
    step(hp, videoFrame);
end
release(hp);
release(hvfr);
end
